(define assoc
  (native_function "
    Proc.new do |arguments, interpreter|
      result = {}
      arguments.each do |x|
        element = interpreter.evaluate(x)
        if element.count != 2
          raise 'Each element must be a key value pair!'
        else
          result[element[0]] = element[1]
        end
      end
      result
    end
  "))

